[VB代码]弹出输入框输入内容显示在label1 当中

来源：百度知道编辑：UC知道时间：2024/05/27 01:57:14

单击按钮弹出输入框
输入数字单击确定以后输入的数字显示在label1 当中

求这个的代码
谢谢了

Private Sub Command1_Click()
dim a as integer
a=inputbox("输入数字")
label1.caption=a
End Sub

Option Explicit

Private Sub Command1_Click()
Dim a
a = InputBox("prompt", "title")
Label1.Caption = a
End Sub

Label1.Caption = InputBox("请输入数字")

Private Sub Command1_Click()
Label1.Caption = InputBox("请输入数字")
End Sub

[VB代码]弹出输入框 输入内容显示在label1 当中